/ Software of the Month Club 1999 November / SOTMC_Nov1999-Ultimate.iso / mac / REALbasic ƒ / Examples / Techniques / Examples by Thomas Tempelmann / FAQs from RB-NUG mailing list / Finding duplicates in array / Finding duplicates in array.rsrc

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 05 16 07 00 02 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000010| 00 00 00 00 00 00 00 00 | 00 02 00 00 00 09 00 00 |........|........|
|00000020| 00 32 00 00 00 20 00 00 | 00 02 00 00 00 52 00 00 |.2... ..|.....R..|
|00000030| 0c 99 63 6c 70 74 64 72 | 61 67 01 00 00 00 00 00 |..clptdr|ag......|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 01 00 00 00 | 0c 2b 00 00 0b 2b 00 00 |........|.+...+..|
|00000060| 00 6e 00 00 00 00 07 ce | 0a 0f 12 1f 0d 01 00 00 |.n......|........|
|00000070| 00 00 00 03 00 00 54 86 | 00 00 00 00 0a 04 00 00 |......T.|........|
|00000080| 00 00 07 ce 0a 0f 12 25 | 01 01 00 00 00 00 00 03 |.......%|........|
|00000090| 00 00 54 8a 00 00 00 00 | 0a 04 00 00 00 00 07 ce |..T.....|........|
|000000a0| 0a 0f 14 26 06 01 00 00 | 00 00 00 03 00 00 54 8d |...&....|......T.|
|000000b0| 00 00 00 00 0a 04 00 00 | 00 00 07 ce 0a 0f 15 2f |........|......./|
|000000c0| 2b 01 00 00 00 00 00 03 | 00 00 54 8e 00 00 00 00 |+.......|..T.....|
|000000d0| 0a 04 00 00 00 00 07 ce | 0a 0f 15 31 33 01 00 00 |........|...13...|
|000000e0| 00 00 00 03 00 00 54 90 | 00 00 00 00 0a 04 00 00 |......T.|........|
|000000f0| 00 00 07 ce 0a 0f 16 26 | 09 01 00 00 00 00 00 03 |.......&|........|
|00000100| 00 00 54 92 00 00 00 00 | 0a 04 00 00 00 00 07 ce |..T.....|........|
|00000110| 0a 0f 16 27 17 01 00 00 | 00 00 00 03 00 00 54 96 |...'....|......T.|
|00000120| 00 00 00 00 0a 04 00 00 | 00 00 07 ce 0a 0f 16 3b |........|.......;|
|00000130| 0a 01 00 00 00 00 00 03 | 00 00 54 97 00 00 00 00 |........|..T.....|
|00000140| 0a 04 00 00 00 00 07 ce | 0a 0f 17 00 33 01 00 00 |........|....3...|
|00000150| 00 00 00 00 0a b1 67 75 | 69 6d 61 20 77 72 6f 74 |......gu|ima wrot|
|00000160| 65 3a 0d 0d 3e 49 20 68 | 61 76 65 20 61 20 73 74 |e:..>I h|ave a st|
|00000170| 72 69 6e 67 20 61 72 72 | 61 79 2c 20 61 6e 64 20 |ring arr|ay, and |
|00000180| 74 68 65 72 65 20 61 72 | 65 20 64 75 70 6c 69 63 |there ar|e duplic|
|00000190| 61 74 65 73 20 69 6e 73 | 69 64 65 20 69 74 2c 20 |ates ins|ide it, |
|000001a0| 42 61 73 69 63 61 6c 6c | 79 20 49 20 0d 3e 77 61 |Basicall|y I .>wa|
|000001b0| 6e 74 20 74 6f 20 70 61 | 72 73 65 20 6f 75 74 20 |nt to pa|rse out |
|000001c0| 74 68 65 20 61 72 72 61 | 79 20 69 6e 74 6f 20 61 |the arra|y into a|
|000001d0| 20 6c 69 73 74 62 6f 78 | 20 73 6f 20 74 68 61 74 | listbox| so that|
|000001e0| 20 6f 6e 6c 79 20 6f 6e | 65 20 63 6f 70 79 20 6f | only on|e copy o|
|000001f0| 66 20 65 61 63 68 20 0d | 3e 73 74 72 69 6e 67 20 |f each .|>string |
|00000200| 69 73 20 6c 69 73 74 65 | 64 2e 20 48 6f 77 20 61 |is liste|d. How a|
|00000210| 6d 20 49 20 74 6f 20 61 | 63 68 65 69 76 65 20 74 |m I to a|cheive t|
|00000220| 68 69 73 2e 2e 2e 2e 49 | 74 20 73 65 65 6d 73 20 |his....I|t seems |
|00000230| 74 6f 20 62 65 20 68 61 | 72 64 65 72 20 74 68 61 |to be ha|rder tha|
|00000240| 6e 20 0d 3e 69 74 20 73 | 6f 75 6e 64 73 2e 2e 2e |n .>it s|ounds...|
|00000250| 2e 2e 0d 0d 4a 6f 65 20 | 48 75 62 65 72 20 61 6c |....Joe |Huber al|
|00000260| 72 65 61 64 79 20 70 6f | 73 74 65 64 20 61 20 73 |ready po|sted a s|
|00000270| 6d 61 72 74 20 73 6f 6c | 75 74 69 6f 6e 20 62 79 |mart sol|ution by|
|00000280| 20 73 69 6d 70 6c 79 20 | 73 6f 72 74 69 6e 67 20 | simply |sorting |
|00000290| 74 68 65 0d 61 72 72 61 | 79 20 28 6d 61 79 20 49 |the.arra|y (may I|
|000002a0| 20 6d 65 6e 74 69 6f 6e | 20 6d 79 20 73 6f 72 74 | mention| my sort|
|000002b0| 20 63 6c 61 73 73 20 61 | 67 61 69 6e 3f 20 73 65 | class a|gain? se|
|000002c0| 65 20 68 74 74 70 3a 2f | 2f 77 77 77 2e 74 65 6d |e http:/|/www.tem|
|000002d0| 70 65 6c 2e 6f 72 67 2f | 72 62 29 0d 61 6e 64 20 |pel.org/|rb).and |
|000002e0| 74 68 65 6e 20 63 68 65 | 63 6b 69 6e 67 20 61 6c |then che|cking al|
|000002f0| 6c 20 61 64 6a 61 63 65 | 6e 74 20 65 6c 65 6d 65 |l adjace|nt eleme|
|00000300| 6e 74 73 2e 20 4f 66 20 | 63 6f 75 72 73 65 2c 20 |nts. Of |course, |
|00000310| 74 68 69 73 20 61 29 20 | 63 68 61 6e 67 65 73 0d |this a) |changes.|
|00000320| 74 68 65 20 6f 72 64 65 | 72 20 6f 66 20 74 68 65 |the orde|r of the|
|00000330| 20 61 72 72 61 79 20 61 | 6e 64 20 62 29 20 6d 61 | array a|nd b) ma|
|00000340| 79 20 74 61 6b 65 20 73 | 6f 6d 65 20 74 69 6d 65 |y take s|ome time|
|00000350| 20 69 6e 20 6c 61 72 67 | 65 20 61 72 72 61 79 73 | in larg|e arrays|
|00000360| 2e 0d 0d 48 6f 77 65 76 | 65 72 2c 20 69 6e 73 74 |...Howev|er, inst|
|00000370| 65 61 64 20 6f 66 20 73 | 6f 72 74 69 6e 67 20 74 |ead of s|orting t|
|00000380| 68 65 20 61 72 72 61 79 | 20 69 74 73 65 6c 66 2c |he array| itself,|
|00000390| 20 79 6f 75 20 63 6f 75 | 6c 64 20 63 72 65 61 74 | you cou|ld creat|
|000003a0| 65 20 61 0d 73 65 63 6f | 6e 64 20 61 72 72 61 79 |e a.seco|nd array|
|000003b0| 20 74 68 61 74 20 73 69 | 6d 70 6c 79 20 63 6f 6e | that si|mply con|
|000003c0| 73 69 73 74 73 20 6f 66 | 20 70 6f 69 6e 74 65 72 |sists of| pointer|
|000003d0| 73 20 28 69 6e 64 65 78 | 20 6e 75 6d 62 65 72 73 |s (index| numbers|
|000003e0| 29 20 74 6f 20 74 68 65 | 0d 6f 72 69 67 69 6e 61 |) to the|.origina|
|000003f0| 6c 20 61 72 72 61 79 2e | 20 57 68 65 6e 20 79 6f |l array.| When yo|
|00000400| 75 20 73 6f 72 74 2c 20 | 79 6f 75 20 73 6f 72 74 |u sort, |you sort|
|00000410| 20 74 68 61 74 20 32 6e | 64 20 61 72 72 61 79 20 | that 2n|d array |
|00000420| 61 6e 64 20 73 6f 20 74 | 68 65 0d 6f 72 69 67 69 |and so t|he.origi|
|00000430| 6e 61 6c 20 6f 72 64 65 | 72 20 72 65 6d 61 69 6e |nal orde|r remain|
|00000440| 73 20 75 6e 63 68 61 6e | 67 65 64 2e 0d 54 68 69 |s unchan|ged..Thi|
|00000450| 73 20 69 73 20 61 6c 73 | 6f 20 64 6f 61 62 6c 65 |s is als|o doable|
|00000460| 20 77 69 74 68 20 6d 79 | 20 53 6f 72 74 69 6e 67 | with my| Sorting|
|00000470| 20 43 6c 61 73 73 2c 20 | 62 65 63 61 75 73 65 20 | Class, |because |
|00000480| 74 68 65 72 65 20 79 6f | 75 20 63 61 6e 0d 70 72 |there yo|u can.pr|
|00000490| 6f 76 69 64 65 20 74 68 | 65 20 43 6f 6d 70 61 72 |ovide th|e Compar|
|000004a0| 65 20 61 6e 64 20 53 77 | 61 70 20 66 75 6e 63 74 |e and Sw|ap funct|
|000004b0| 69 6f 6e 73 20 62 79 20 | 79 6f 75 72 73 65 6c 66 |ions by |yourself|
|000004c0| 2e 0d 0d 48 65 72 65 27 | 73 20 61 6e 20 65 78 61 |...Here'|s an exa|
|000004d0| 6d 70 6c 65 20 28 61 6c | 6c 20 6f 75 74 20 6f 66 |mple (al|l out of|
|000004e0| 20 6d 79 20 68 65 61 64 | 2c 20 6e 6f 74 20 74 65 | my head|, not te|
|000004f0| 73 74 65 64 29 2e 0d 0d | 53 61 79 2c 20 79 6f 75 |sted)...|Say, you|
|00000500| 20 68 61 76 65 20 74 68 | 65 20 6f 72 69 67 69 6e | have th|e origin|
|00000510| 61 6c 20 61 72 72 61 79 | 3a 0d 0d 20 20 44 69 6d |al array|:..  Dim|
|00000520| 20 55 6e 73 6f 72 74 65 | 64 4e 61 6d 65 73 28 2e | Unsorte|dNames(.|
|00000530| 2e 2e 29 20 61 73 20 53 | 74 72 69 6e 67 20 20 2f |..) as S|tring  /|
|00000540| 2f 20 68 65 72 65 20 74 | 68 65 20 6e 61 6d 65 73 |/ here t|he names|
|00000550| 20 61 72 65 20 69 6e 20 | 71 75 69 74 65 0d 20 20 | are in |quite.  |
|00000560| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000570| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000580| 20 20 2f 2f 20 72 61 6e | 64 6f 6d 20 6f 72 64 65 |  // ran|dom orde|
|00000590| 72 20 61 6e 64 20 79 6f | 75 20 77 61 6e 74 20 74 |r and yo|u want t|
|000005a0| 6f 0d 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |o.      |        |
|000005b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000005c0| 20 20 20 20 20 20 2f 2f | 20 6b 65 65 70 20 74 68 |      //| keep th|
|000005d0| 65 6d 20 74 68 61 74 20 | 77 61 79 2e 0d 0d 4e 6f |em that |way...No|
|000005e0| 77 20 61 64 64 20 74 68 | 65 20 73 6f 72 74 65 72 |w add th|e sorter|
|000005f0| 20 61 72 72 61 79 3a 0d | 0d 20 20 44 69 6d 20 53 | array:.|.  Dim S|
|00000600| 6f 72 74 65 64 49 6e 64 | 65 78 28 30 29 20 61 73 |ortedInd|ex(0) as|
|00000610| 20 49 6e 74 65 67 65 72 | 0d 20 20 52 65 64 69 6d | Integer|.  Redim|
|00000620| 20 53 6f 72 74 65 64 49 | 6e 64 65 78 28 55 42 6f | SortedI|ndex(UBo|
|00000630| 75 6e 64 28 55 6e 73 6f | 72 74 65 64 4e 61 6d 65 |und(Unso|rtedName|
|00000640| 73 29 29 20 20 2f 2f 20 | 73 65 74 20 69 74 20 74 |s))  // |set it t|
|00000650| 6f 20 74 68 65 20 73 61 | 6d 65 20 73 69 7a 65 0d |o the sa|me size.|
|00000660| 20 20 46 6f 72 20 69 20 | 3d 20 30 20 74 6f 20 55 |  For i |= 0 to U|
|00000670| 42 6f 75 6e 64 28 55 6e | 73 6f 72 74 65 64 4e 61 |Bound(Un|sortedNa|
|00000680| 6d 65 73 29 0d 20 20 20 | 20 53 6f 72 74 65 64 49 |mes).   | SortedI|
|00000690| 6e 64 65 78 28 69 29 20 | 3d 20 69 0d 20 20 45 6e |ndex(i) |= i.  En|
|000006a0| 64 0d 0d 4e 6f 77 20 79 | 6f 75 20 68 61 76 65 20 |d..Now y|ou have |
|000006b0| 61 6e 20 61 72 72 61 79 | 20 74 68 61 74 20 69 73 |an array| that is|
|000006c0| 20 73 6f 72 74 65 64 20 | 74 68 65 20 73 61 6d 65 | sorted |the same|
|000006d0| 20 77 61 79 20 61 73 20 | 74 68 65 20 6f 72 69 67 | way as |the orig|
|000006e0| 69 6e 61 6c 0d 6f 6e 65 | 20 73 6f 20 66 61 72 2e |inal.one| so far.|
|000006f0| 20 4e 6f 77 20 77 65 20 | 63 61 6e 20 73 6f 72 74 | Now we |can sort|
|00000700| 20 74 68 69 73 20 61 72 | 72 61 79 20 75 73 69 6e | this ar|ray usin|
|00000710| 67 20 6d 79 20 53 6f 72 | 74 20 43 6c 61 73 73 20 |g my Sor|t Class |
|00000720| 62 79 0d 6a 75 73 74 20 | 69 6d 70 6c 65 6d 65 6e |by.just |implemen|
|00000730| 74 69 6e 67 20 74 68 65 | 20 53 6f 72 74 20 61 6e |ting the| Sort an|
|00000740| 64 20 43 6f 6d 70 61 72 | 65 20 6d 65 74 68 6f 64 |d Compar|e method|
|00000750| 73 20 69 6e 20 61 20 73 | 75 62 63 6c 61 73 73 28 |s in a s|ubclass(|
|00000760| 21 29 0d 6f 72 20 49 6e | 74 65 72 66 61 63 65 20 |!).or In|terface |
|00000770| 43 6c 61 73 73 20 28 52 | 42 32 20 6f 6e 6c 79 29 |Class (R|B2 only)|
|00000780| 3a 0d 0d 20 20 46 75 6e | 63 74 69 6f 6e 20 43 6f |:..  Fun|ction Co|
|00000790| 6d 70 61 72 65 20 28 6c | 65 66 74 20 61 73 20 49 |mpare (l|eft as I|
|000007a0| 6e 74 65 67 65 72 2c 20 | 72 69 67 68 74 20 61 73 |nteger, |right as|
|000007b0| 20 49 6e 74 65 67 65 72 | 29 20 61 73 20 49 6e 74 | Integer|) as Int|
|000007c0| 65 67 65 72 0d 20 20 20 | 20 44 69 6d 20 6c 2c 20 |eger.   | Dim l, |
|000007d0| 72 20 61 73 20 53 74 72 | 69 6e 67 0d 20 20 20 20 |r as Str|ing.    |
|000007e0| 6c 20 3d 20 55 6e 73 6f | 72 74 65 64 4e 61 6d 65 |l = Unso|rtedName|
|000007f0| 73 28 53 6f 72 74 65 64 | 49 6e 64 65 78 28 6c 65 |s(Sorted|Index(le|
|00000800| 66 74 29 29 0d 20 20 20 | 20 72 20 3d 20 55 6e 73 |ft)).   | r = Uns|
|00000810| 6f 72 74 65 64 4e 61 6d | 65 73 28 53 6f 72 74 65 |ortedNam|es(Sorte|
|00000820| 64 49 6e 64 65 78 28 72 | 69 67 68 74 29 29 0d 20 |dIndex(r|ight)). |
|00000830| 20 20 20 69 66 20 6c 20 | 3d 20 72 20 74 68 65 6e |   if l |= r then|
|00000840| 0d 20 20 20 20 20 20 72 | 65 74 75 72 6e 20 30 20 |.      r|eturn 0 |
|00000850| 2f 2f 20 74 68 65 79 20 | 61 72 65 20 65 71 75 61 |// they |are equa|
|00000860| 6c 0d 20 20 20 20 65 6c | 73 65 69 66 20 6c 20 3c |l.    el|seif l <|
|00000870| 20 72 20 74 68 65 6e 0d | 20 20 20 20 20 20 72 65 | r then.|      re|
|00000880| 74 75 72 6e 20 2d 31 20 | 2f 2f 20 6c 65 66 74 20 |turn -1 |// left |
|00000890| 69 73 20 73 6d 61 6c 6c | 6c 65 72 0d 20 20 20 20 |is small|ler.    |
|000008a0| 65 6c 73 65 0d 20 20 20 | 20 20 20 72 65 74 75 72 |else.   |   retur|
|000008b0| 6e 20 20 31 20 2f 2f 20 | 6c 65 66 74 20 69 73 20 |n  1 // |left is |
|000008c0| 6c 61 72 67 65 72 0d 20 | 20 20 20 65 6e 64 0d 20 |larger. |   end. |
|000008d0| 20 45 6e 64 20 46 75 6e | 63 74 69 6f 6e 0d 0d 20 | End Fun|ction.. |
|000008e0| 20 53 75 62 20 53 77 61 | 70 20 28 6c 65 66 74 20 | Sub Swa|p (left |
|000008f0| 61 73 20 49 6e 74 65 67 | 65 72 2c 20 72 69 67 68 |as Integ|er, righ|
|00000900| 74 20 61 73 20 49 6e 74 | 65 67 65 72 29 0d 20 20 |t as Int|eger).  |
|00000910| 20 20 2f 2f 20 69 6e 73 | 74 65 61 64 20 6f 66 20 |  // ins|tead of |
|00000920| 73 77 61 70 70 69 6e 67 | 20 74 68 65 20 53 74 72 |swapping| the Str|
|00000930| 69 6e 67 73 20 77 65 20 | 6a 75 73 74 20 73 77 61 |ings we |just swa|
|00000940| 70 20 74 68 65 20 69 6e | 64 65 78 65 73 20 68 65 |p the in|dexes he|
|00000950| 72 65 0d 20 20 20 20 44 | 69 6d 20 74 6d 70 20 61 |re.    D|im tmp a|
|00000960| 73 20 49 6e 74 65 67 65 | 72 0d 20 20 20 20 74 6d |s Intege|r.    tm|
|00000970| 70 20 3d 20 53 6f 72 74 | 65 64 49 6e 64 65 78 28 |p = Sort|edIndex(|
|00000980| 6c 65 66 74 29 0d 20 20 | 20 20 53 6f 72 74 65 64 |left).  |  Sorted|
|00000990| 49 6e 64 65 78 28 6c 65 | 66 74 29 20 3d 20 53 6f |Index(le|ft) = So|
|000009a0| 72 74 65 64 49 6e 64 65 | 78 28 72 69 67 68 74 29 |rtedInde|x(right)|
|000009b0| 0d 20 20 20 20 53 6f 72 | 74 65 64 49 6e 64 65 78 |.    Sor|tedIndex|
|000009c0| 28 72 69 67 68 74 29 20 | 3d 20 74 6d 70 0d 20 20 |(right) |= tmp.  |
|000009d0| 45 6e 64 20 53 75 62 0d | 0d 54 6f 20 73 6f 72 74 |End Sub.|.To sort|
|000009e0| 20 74 68 69 73 2c 20 63 | 61 6c 6c 20 74 68 65 20 | this, c|all the |
|000009f0| 53 6f 72 74 28 29 20 6d | 65 74 68 6f 64 20 66 72 |Sort() m|ethod fr|
|00000a00| 6f 6d 20 6d 79 20 43 6c | 61 73 73 2e 0d 0d 41 66 |om my Cl|ass...Af|
|00000a10| 74 65 72 20 74 68 65 20 | 61 72 72 61 79 20 68 61 |ter the |array ha|
|00000a20| 73 20 62 65 65 6e 20 73 | 6f 72 74 65 64 2c 20 79 |s been s|orted, y|
|00000a30| 6f 75 20 63 61 6e 20 66 | 69 6e 64 20 74 68 65 20 |ou can f|ind the |
|00000a40| 64 75 70 6c 69 63 61 74 | 65 73 3a 0d 0d 20 20 44 |duplicat|es:..  D|
|00000a50| 69 6d 20 49 73 41 44 75 | 70 6c 69 63 61 74 65 28 |im IsADu|plicate(|
|00000a60| 30 29 20 61 73 20 42 6f | 6f 6c 65 61 6e 2c 20 69 |0) as Bo|olean, i|
|00000a70| 2c 20 6a 2c 20 6b 20 61 | 73 20 49 6e 74 65 67 65 |, j, k a|s Intege|
|00000a80| 72 0d 20 20 52 65 64 69 | 6d 20 49 73 41 44 75 70 |r.  Redi|m IsADup|
|00000a90| 6c 69 63 61 74 65 28 55 | 42 6f 75 6e 64 28 55 6e |licate(U|Bound(Un|
|00000aa0| 73 6f 72 74 65 64 4e 61 | 6d 65 73 29 29 0d 20 20 |sortedNa|mes)).  |
|00000ab0| 69 20 3d 20 30 0d 20 20 | 6a 20 3d 20 53 6f 72 74 |i = 0.  |j = Sort|
|00000ac0| 65 64 49 6e 64 65 78 28 | 69 29 0d 20 20 77 68 69 |edIndex(|i).  whi|
|00000ad0| 6c 65 20 69 20 3c 20 55 | 42 6f 75 6e 64 28 55 6e |le i < U|Bound(Un|
|00000ae0| 73 6f 72 74 65 64 4e 61 | 6d 65 73 29 0d 20 20 20 |sortedNa|mes).   |
|00000af0| 20 69 20 3d 20 69 20 2b | 20 31 0d 20 20 20 20 6b | i = i +| 1.    k|
|00000b00| 20 3d 20 53 6f 72 74 65 | 64 49 6e 64 65 78 28 69 | = Sorte|dIndex(i|
|00000b10| 29 0d 20 20 20 20 69 66 | 20 55 6e 73 6f 72 74 65 |).    if| Unsorte|
|00000b20| 64 4e 61 6d 65 73 28 6a | 29 20 3d 20 55 6e 73 6f |dNames(j|) = Unso|
|00000b30| 72 74 65 64 4e 61 6d 65 | 73 28 6b 29 20 74 68 65 |rtedName|s(k) the|
|00000b40| 6e 0d 20 20 20 20 20 20 | 49 73 41 44 75 70 6c 69 |n.      |IsADupli|
|00000b50| 63 61 74 65 28 6b 29 20 | 3d 20 74 72 75 65 0d 20 |cate(k) |= true. |
|00000b60| 20 20 20 65 6e 64 0d 20 | 20 20 20 6a 20 3d 20 6b |   end. |   j = k|
|00000b70| 0d 20 20 57 65 6e 64 0d | 0d 41 66 74 65 72 20 74 |.  Wend.|.After t|
|00000b80| 68 61 74 2c 20 79 6f 75 | 20 63 61 6e 20 64 65 63 |hat, you| can dec|
|00000b90| 69 64 65 20 77 68 61 74 | 20 74 6f 20 64 6f 20 77 |ide what| to do w|
|00000ba0| 69 74 68 20 79 6f 75 72 | 20 64 75 70 6c 69 63 61 |ith your| duplica|
|00000bb0| 74 65 73 3a 0d 54 68 65 | 20 41 72 72 61 79 20 49 |tes:.The| Array I|
|00000bc0| 73 41 44 75 70 6c 69 63 | 61 74 65 28 29 20 63 6f |sADuplic|ate() co|
|00000bd0| 6e 74 61 69 6e 73 20 74 | 72 75 65 20 66 6f 72 20 |ntains t|rue for |
|00000be0| 65 61 63 68 20 4e 61 6d | 65 0d 74 68 61 74 20 69 |each Nam|e.that i|
|00000bf0| 73 20 61 20 64 75 70 6c | 69 63 61 74 65 2e 0d 0d |s a dupl|icate...|
|00000c00| 54 68 6f 6d 61 73 0d 00 | 00 00 16 00 01 00 00 00 |Thomas..|........|
|00000c10| 00 00 0b 00 09 00 04 00 | 00 00 09 00 00 00 00 00 |........|........|
|00000c20| 00 00 00 00 30 00 00 00 | 01 00 00 00 04 00 00 00 |....0...|........|
|00000c30| 00 00 00 00 02 54 45 58 | 54 00 00 01 00 00 00 00 |.....TEX|T.......|
|00000c40| 00 00 00 00 00 73 74 79 | 6c 00 00 01 00 00 00 00 |.....sty|l.......|
|00000c50| 00 00 00 00 00 00 00 00 | 24 00 00 00 05 00 01 04 |........|$.......|
|00000c60| 07 00 4f 00 5a 01 f3 02 | 58 00 00 00 00 00 00 01 |..O.Z...|X.......|
|00000c70| 70 8c 00 00 00 09 99 91 | e0 00 00 00 00 00 00 01 |p.......|........|
|00000c80| 00 00 00 0c 2b 00 00 0b | 2b 00 00 00 6e 09 75 f7 |....+...|+...n.u.|
|00000c90| 00 33 6a 00 00 00 1c 00 | 6e 00 03 54 45 58 54 00 |.3j.....|n..TEXT.|
|00000ca0| 00 00 22 73 74 79 6c 00 | 00 00 2e 64 72 61 67 00 |.."styl.|...drag.|
|00000cb0| 00 00 3a 6b 77 73 74 00 | 00 00 46 01 00 ff ff 00 |..:kwst.|..F.....|
|00000cc0| 00 00 00 00 00 00 00 01 | 00 ff ff 00 00 0a b5 00 |........|........|
|00000cd0| 00 00 00 00 80 ff ff 00 | 00 0a cf 00 00 00 00 bf |........|........|
|00000ce0| 4c ff ff 00 00 0b 03 00 | d8 71 18                |L.......|.q.     |
+--------+-------------------------+-------------------------+--------+--------+